home *** CD-ROM | disk | FTP | other *** search
/ Developer Helper 1: Phil & Dave's Excellent CD / Excellent CD HFS.raw / HyperCard / HyperCard 1.2.2 International / HyperCard British (B-1.2.2) / More Stacks / Help / Help / card_158957.txt < prev    next >
Text File  |  1988-02-18  |  1KB  |  72 lines
  1. -- card: 158957 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 4745
  5. -- name: 
  6.  
  7.  
  8. -- part 3 (button)
  9. -- low flags: 00
  10. -- high flags: 8003
  11. -- rect: left=49 top=172 right=208 bottom=109
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Did I?
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   put "I'm waiting to see if you click."
  23.   wait 2 secs
  24.   if the mouseClick then
  25.     put "You clicked."
  26.   else put "You didn't click."
  27. end mouseUp
  28.  
  29.  
  30.  
  31. -- part 5 (button)
  32. -- low flags: 00
  33. -- high flags: A000
  34. -- rect: left=463 top=55 right=88 bottom=487
  35. -- title width / last selected line: 0
  36. -- icon id / first selected line: 29019 / 29019
  37. -- text alignment: 1
  38. -- font id: 0
  39. -- text size: 12
  40. -- style flags: 0
  41. -- line height: 16
  42. -- part name: 
  43. ----- HyperTalk script -----
  44. on mouseUp
  45.   visual effect wipe down
  46.   go to card id 156785
  47. end mouseUp
  48.  
  49.  
  50.  
  51. -- part contents for background part 43
  52. ----- text -----
  53. 337,169
  54.  
  55. -- part contents for background part 2
  56. ----- text -----
  57. mouseClick
  58.  
  59. -- part contents for background part 1
  60. ----- text -----
  61. the mouseClick
  62.  
  63. tells if the mouse was clicked since this message began.
  64.  
  65. on mouseUp
  66.   put "I'm waiting to see if you click."
  67.   wait 2 secs
  68.   if the mouseClick then
  69.     put "You clicked."
  70.   else put "You didn't click."
  71. end mouseUp
  72.